=========================================================================== BBS: The Abacus * HST/DS * Potterville, MI Date: 02-13-93 (14:15) Number: 99 From: SCOTT WUNSCH Refer#: NONE To: ALL Recvd: NO Subj: MsgSplit 2.00 Conf: (35) Quick Basi --------------------------------------------------------------------------- Part 3 of MSGSPLIT.BAS - continued from last message... PRINT "Warning: Lines wrapped in message number"; STR$(OnMsgNumber); _ " ." END IF CLOSE #2 IF NOT EOF(1) THEN OnMsgNumber = OnMsgNumber + 1 FileOutNum = FileOutNum + 1 LinesOut = 1 END IF LOOP UNTIL EOF(1) CLOSE PRINT "Complete!" END ________O_/________________________| SNIP |______________________\_O_______ O \ | HERE | / O Line wrapping and message splitted accomplished by MsgSplit 2.00, a Victor Yiu and Scott Wunsch creation. Whaddya think? :) /\ LLAP... > \ cott \\'unsch < \/ ... My programmes *never* have bugs... they just develop random features. --- * Origin: So? What's your point? -=- Regina, Sask, Canada (1:140/23.1701) SEEN-BY: 1/211 11/2 4 13/13 101/1 108/89 109/25 110/69 114/5 123/19 124/1 SEEN-BY: 153/752 154/40 77 157/2 159/100 125 430 950 203/23 209/209 280/1 SEEN-BY: 390/1 396/1 15 397/2 2230/100 3603/20